﻿Module DataGrid
    Public Sub FormatDataGrid(ByVal dgv As DataGridView)
        dgv.ReadOnly = True
        dgv.SelectionMode = DataGridViewSelectionMode.FullRowSelect
        dgv.AllowUserToAddRows = False
        dgv.AllowUserToDeleteRows = False
        ' dgv.AllowUserToResizeColumns = False
        dgv.AllowUserToResizeRows = False
        dgv.RowTemplate.Height = 30
        dgv.MultiSelect = False
        dgv.CellBorderStyle = DataGridViewCellBorderStyle.None
        dgv.RowHeadersVisible = True
        dgv.AlternatingRowsDefaultCellStyle.BackColor = Color.Beige
        dgv.BackgroundColor = Color.FromArgb(171, 171, 171)
        dgv.ColumnHeadersDefaultCellStyle.Font = New Font("Khmer OS Content", "8.5")
        dgv.DefaultCellStyle.Font = New Font("Khmer OS Content", "8.25")
    End Sub
End Module
